www.gusucode.com > matlab编程NSCT分解 图像融合 各个融合指标评价体系 分解源码程序 > matlab编程NSCT分解 图像融合 各个融合指标评价体系 分解源码程序/NSCT/expEdge.m

    function [F]= expEdge(Pan, lamda,eps)
[FX,FY] = gradient(Pan);
u=((FX.*FX)+(FY.*FY)).^(1/2);
%a = max(max(abs(u)))
[m,n]=size(u); 
F= exp( -((lamda*(ones(m,n)))./((abs(u).*abs(u).*abs(u).*abs(u))+ eps)));